﻿Public Class DeporteNegocio
    Public Function insertar(ByVal nombre As String, ByVal ubicacion As String, ByVal descripcion As String, ByVal costo As String, ByVal instructor As String, ByVal fecha_evento As String) As Deporte

        Dim modelo As New Deporte()
        modelo.nombre = nombre
        modelo.ubicacion = ubicacion
        modelo.descripcion = descripcion
        modelo.costo = costo
        modelo.instructor = instructor
        modelo.fecha_evento = fecha_evento

        Dim dao As New DeporteDAO
        Return dao.insertar(modelo)
    End Function

    Public Sub actualizar(ByVal iddeporte As Integer, ByVal nombre As String, ByVal ubicacion As String, ByVal descripcion As String, ByVal costo As String, ByVal instructor As String, ByVal fecha_evento As String)

        Dim modelo As New Deporte()
        modelo.iddeporte = iddeporte
        modelo.nombre = nombre
        modelo.ubicacion = ubicacion
        modelo.descripcion = descripcion
        modelo.costo = costo
        modelo.instructor = instructor
        modelo.fecha_evento = fecha_evento

        Dim dao As New DeporteDAO
        dao.actualizar(modelo)
    End Sub


    Public Function obtener(ByVal idDeporte As Integer) As Deporte
        Dim dao As New DeporteDAO
        Return dao.obtener(idDeporte)
    End Function

    Public Function buscarPorNombre(ByVal nombre As String) As Collection
        Dim dao As New DeporteDAO
        Return dao.buscarPorNombre(nombre)
    End Function

    Public Sub eliminar(ByVal idDeporte As Integer)
        Dim dao As New DeporteDAO
        dao.eliminar(idDeporte)
    End Sub
End Class